www.gusucode.com > HCONLY站长管理助手 V1.3 > HCONLY站长管理助手 V1.3\code\admin\ppwwdd.asp
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="../config/chkAdmin.asp"-->
<!--#include file="../config/config.asp" -->
<!--#include file="../config/conn.asp" -->
<!--#include file="../config/md5.asp" -->
<%
'***************后台密码修改*****************
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body bgcolor="#DBE2EA">
<div class="MainDiv">
<table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="DBE2EA" class="CContent">
<tr>
<td class="CPanel">
<div id="updateInfo" style="background:ffffe1;border:1px solid #89441f;padding:4px;display:none"></div>
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top" bgcolor="DBE2EA">
<%
if request.Form("new_pwd1")="" and request.Form("new_pwd2")="" then
%>
<form name="form1" method="post" action="">
<div align="left" style="padding:5px;line-height:170%;clear:both;font-size:12px">
<p align="center">
输入旧密码<b>:</b>
<input name="old_pwd" type="password" size="20" style="border:1px solid #999">
<br>
<br/>
输入新密码<b>:</b>
<input name="new_pwd1" type="password" id="new_pwd1" size="20" style="border:1px solid #999">
<br>
<br/>
确认新密码<b>:</b>
<input name="new_pwd2" type="password" id="new_pwd2" size="20" style="border:1px solid #999">
</p>
<p align="center">
<input type="submit" name="tijiao" value="提交">
<input type="reset" name="chongzhi" value="重置">
<br/>
</p>
</div>
</form>
<%
else
If request.Form("new_pwd1")<>request.Form("new_pwd2") then
response.write("<center><p><img src='../images/rename1.gif'> <font size=2>您为程序设置新密码时两次的输入不一致</font><p><a href='javascript:history.go(-1);'><font size=2><img src='../images/fanhui.jpg' border='0'></a></center>")
else
Set rs = Server.CreateObject("ADODB.Recordset")
SQL="select * from [admin] where id=1"
rs.Open SQL,Conn,1,3
If rs("pwd") <> MD5(request.Form("old_pwd")) Then
response.write("<center><p><img src='../images/rename1.gif'> <font size=2>旧密码填写错误,请仔细检查</font><p><a href='javascript:history.go(-1);'><img src='../images/fanhui.jpg' border='0'></a></center>")
Else
rs("pwd") = MD5(request.Form("new_pwd1"))
rs.update
response.write("<center><p><font size=2>更新密码成功!请您退出本程序并使用新密码重新登录</font><p><a href='/admin/logout.asp'><img src='../images/queding.jpg' border='0'></a></center>")
End If
rs.close
set rs = nothing
end if
end if
%>
</tr>
</table>
</td></tr></table>
</div>
</body>
</html>